﻿Imports DAO
Imports DTO
Public Class LoaiSachBUS
    Public Function LayThongTinTheLoaiTheoMa(ByVal maTheLoai As Integer) As LoaiSachDTO
        Dim dao As New LoaiSachDAO()
        Return dao.LayThongTinTheLoaiTheoMa(maTheLoai)
    End Function
    Public Function LayDSLoaiSach() As List(Of LoaiSachDTO)
        Dim dao As New LoaiSachDAO()
        Return dao.LayDSLoaiSach()
    End Function

    Public Function ThemLoaiSach(ByVal sql As String) As Integer
        Dim dao As New LoaiSachDAO()
        Return dao.ThemLoaiSach(sql)
    End Function

    Public Function CapNhatLoaiSach(ByVal sql As String) As Integer
        Dim dao As New LoaiSachDAO()
        Return dao.CapNhatLoaiSach(sql)
    End Function

End Class
